1 A$="0E03CD8BD1C1E5E52ADB01E33E8CF533C5CDCCFFC327F6":POKE140,27:FORI=0TO29
2 POKEI+7000,VAL("&H"+MID$(A$,I*2+1,2)):NEXT:POKE154,88:POKE155,27:POKE139,105